home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 23.zip / BS1 part 23 / Macro Paint v1.10.adf / Rexx / border.rexx next >
OS/2 REXX Batch file  |  1991-02-21  |  189b  |  11 lines
  1. /* Draw a double border with REGION arguments */
  2.  
  3. ARG border
  4.  
  5. ADDREXX 'mp_port'
  6.  
  7. PARSE VAR border x1 ' ' y1 ' ' x2 ' ' y2
  8.  
  9. mp_rectangle x1 y1 x2 y2
  10. mp_rectangle (x1+4) (y1+4) (x2-4) (y2-4)
  11.